+++ /dev/null
-#!/usr/bin/perl -w -i
-
-use English;
-use strict;
-
-$RS = undef;
-
-my $prefix = $ENV{"DEBIAN_INFO_PREFIX"};
-
-my $x = <>;
-if(!($x =~ m/^(\s*START-INFO-DIR-ENTRY\s+\*\s*[^:]+:\s*)\(([^\)]+)\)/mo)) {
- die "Couldn't find START-INFO-DIR-ENTRY.";
-}
-
-print ${PREMATCH};
-print "$1($prefix/$2)";
-print ${POSTMATCH};
rm $(pkgdir_common)/usr/share/emacs/$(runtime_ver)/etc/emacs.desktop
rm $(pkgdir_common)/usr/share/applications/emacs.desktop
- # Mangle info files.
- chmod 755 debian/mangle-info
- for f in $(main_dir_info_files); \
- do \
- gunzip $(pkgdir_common)/usr/share/info/$(info_subdir)/$$f.gz; \
- DEBIAN_INFO_PREFIX=$(info_subdir) \
- debian/mangle-info \
- $(pkgdir_common)/usr/share/info/$(info_subdir)/$$f; \
- done
-
gunzip $(pkgdir_common)/usr/share/man/man1/*.gz
perl -pi -e "s|man1/etags\\.1|man1/etags\\.$(flavor)\\.1|" \
$(pkgdir_common)/usr/share/man/man1/ctags.1